' Control Data 

1604A Computer Instnjctions 

SYMBOLS 

k - Address portion of instruction b - Deagnator for index 

K - k + (Bb), Modified shift count j = E>esignator for 22, 23, 74-76 

m «» Address portiai of instruction # - Restrict instruction to upper 

M = m -f (Bb), Modified <^)ei3nd address ' — Complemented 

y - Address portion of instruction () ~ Contents of 

Y - y -h (Bh), Modified operand NI = Next instruction 

DATA TRANSMISSION INDEXING 

LDA 12 Load A (M)-»A ENI SO &)ter index y-»Bb 

LAC 13 Load A complement (M)'-»A INI 51 Increase index y + (Bb)—►Bb 

STA 20 Store A (A)-*M LIU 52 Load ipdex upper (mrA)-*Bb 

LIX^ 16 Load Q (M)—^ LIL S3 Load index lower (mtA)-^Bb 

LQC 17 Load Q cwnplement (M)'-»Q SIU 56 Store index upper (Bb)-Mno* 

STQ 21 Store Q (Q)-*M SIL 57 Store index lower (B‘>)-»mLA 

laC# 54 Index skip: 

SHIFTING (Bb)p<y;(Bb}+l-»Bb, half exit 

(A) right shift, by K (Bb)-y: 0-4Bb. full exit 

(Q) right shift, by K UP 55 Index jump: 

(AQ) right shift, by K (Bb)»-0: (Bb)-l—Bb, Nl-m 

(A) left shift, by K (Bb)-0:NI 

(Q) left shift, by K 
(AQ) left shift, by K 

ARITHMETIC 
FIXEO/FRACTIONAL FLOATING 

ADD 14 Add to A [(A)-f-(M)l-»A 

SUB 15 Subtract from A 1(A) —(M))-*A 

MUI 24 Multiply integer (M)(A)^QA 

DVI 25 Divide integer (QA)/(M)-«A, rem Q 

MUF 26 Multiply fractional (M){A)^AQ 

DVF 27 Divide tract. (AQ)/(M)—►A, rera Q 

RAD 70 Replace add [(M)-KA)J-»M& A 

•RSB 71 Replacesubtract [{M)-(A)HM&A 

RAO 72 Replace add cme [(M) + 1& A 

RSO 73 Replace'sub. CHie [(M)-lj-»M&A 

SCA 34 Scale A A left until |(A)1 S . 5cffk—0; (k—no. of shifts)—♦Bb 

SCQ 35 Scale AQ AQ left until |(AQ)j g . 5ork-0: (k-na (rf shifts)-»Bb 


FAD 30 Floating add. [(A)-|-(M)I-»A 
FSB 31 Floating sub. ((A)-(M)I-»A 
FMU 32 Floating mult. (A)(M)—»A 
FDV 33 Floating div. (A)AM)-*A 


ARS 01 
QRS 02 
LUS 03 
ALS 05 
QLS 06 
LLS 07 


SA I85c 


A AND Q TEST CONSOLE TEST 

AJP* 22 Jump to m OT condition j I SLJ* 75 Jump to m on condition j 

QJP* 23 Jump to m <» condition j_ | SLS* 76 Stop (» j, and to m 


MEMORY TEST 

KQS# 64 Search (Bb) words, if (M-1). or (M-2), etc.-{A) exit: 9<A, half exit 

THS# 65 Search (Bb) wwds, if (M-1), or (M-2), etc. >(Aj exit; SA. half exit 

MEQii 66 Search (Bbi words, if L(Q;(M-1 ),<m-(M- 2), etc. -(A) exit; »^A, half exit 

MTH# 67 Search (Bb) wOTds. if L(Q)(M-1). a-(M-2), etc. >(A) exit: SA. half exit 

SSK# 36 StOTageskip (M) neg: exit; (M) pos: half exit 

SSH# 37 Storage shift (M) neg: exit, left 1; (M) pos: half exit, left 1 




LOGICAL 

ENA 

10 

GENERAL 

Enter A Extend sign Y, \-^A 

SCL 

41 

Set (A.)-l for (M.)-l 

ENQ 

INA 

04 

11 

Enter Q Extend sign ^, \ --*Q 
Increase A Extend sign Y, 

SCM 

42 

Clear (A.) to 0 for (M.) -1 
Selective comN^ntent 

SAU 

60 

[y+(A)HA 

Substitute address upper 

SSU 

43 

Complement (A,) for (M.) ■ 1 
Selective substitute 

SAL 

61 

(Am_«»)—‘Mua 

Substitute address lower 



(M.)-»(A.)for(Q,)-l 

INT 

62 

(A..^)^M,,* 

Input Block trans (B>>) words 

ADL 

45 

Add lexical l(A)+L(Ql(M)|—A 

OUT 

63 

Output Block trans (Bo) words 

SBL 

46 


EXF 

74 

External function 

STL 

47 

Store logical L(Q)(A)-*M 



j -0; Select 
j a 1—6; Activate channel j 
j-7; Sense 


DESIGNATOR FOR * INSTRUCTION 


22 

23 I 75 

76 

0 (A) »0: Jump 

1 (A)?«0; Jump 

2 (A) Pos: Jump 

3 (A) Neg; Jump 

4 (A)-0; Ret. Jump 

5 (A) »^0: Ret. Jump 

6 (A) Pos: Ret. Jump 

7 (A) Neg; Ret. Jump 

(Q>»0: Jump 
(Q)»^0; Jump 
(Q) Pos; Jump 
(Q) Neg; Jump 
(Q)-0: Ret. Jump 
(Q) »^0: Ret. Jump 
(Qi Pos: Ret. Jump 
(Qi Neg: Ret. Jump 

Jump 

Key 1; Jump 

Key 2; Jump 

Key 3; Jump 

Ret. Jump 

Key 1; Ret. Jump 
Key 2; Ret. Jump 
Key 3: Ret. Jump 

Stop; Jump 

Key 1: Stop; Jump 

Key 2; Stop; Jump 

Key .3: Stop; Jump 

Stop; Ret. Jump 

Key I:Stop:Ret. Jump 
Key 2;Stop; Ret. Jump 
Key 3: Stop; Ret. Jump 


1. 2, & 3 refer to Selective Jump or Stop Key Switches, 


CONTROL DATA 


COMPUTER DIVISION 


CORPORATION 


MINNEAPOLIS. MINNESOTA 



